#include <WinTen.h>
#include <Windows.h>
#include <ClipApi.h>

//----------------------------------------------------------------------------//

CLIPPER DdeCommand()
{
   WORD    wLen = _parclen( 1 );
   HGLOBAL hMem = GlobalAlloc( GMEM_MOVEABLE | GMEM_DDESHARE, wLen + 1 );
   LPSTR   pMem = GlobalLock( hMem );

   _bcopy( pMem, _parc( 1 ), wLen + 1 );
   GlobalUnlock( hMem );

   _retnl( MAKELPARAM( 0, hMem ) );
}

//----------------------------------------------------------------------------//

CLIPPER DdeGetComm()  // and
{
   HGLOBAL hMem = HIWORD( _parnl( 1 ) );

   _retc( GlobalLock( hMem ) );
   GlobalUnlock( hMem );
}

//----------------------------------------------------------------------------//
